*                        Multiplication and Set Intersection         Operator

  --------------------------------------------------------------------------
  Arithmetic Multiplication

 <exp1> * <exp2>

    The * operator performs multiplication. The result depends upon the
    operators. If either is real, the result is real; otherwise, the
    result is integer.

   <exp1>,<exp2>    Any integer or real expression.

    Example:
           I := 6 * 7;              { I = 42 }
           X := 3.4 * 5;            { X = 17.0 }

  --------------------------------------------------------------------------
  Set Intersection

 <set1> * <set2>

    The * operator also performs set intersection. The result is a set of
    the same type as the operands, whose members are members of both
    <set1> and <set2>.

   <set1>,<set2>    Any set expression. Both expressions must be of the
                    same base type.

    Example:
           S := [1,2,5,6] * [2,4,6,8];      { S = [2,6] }